From: Markus Rost <rost@math.uni-bielefeld.de>
Date: Wed, 13 Nov 2002 02:26:39 +0000 (+0000)
Subject: (custom-handle-all-keywords): Fix arg passed to custom-add-to-group.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~29782
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=e34f3b80c839cf6a23e70723312717f2406cc0ab;p=emacs.git

(custom-handle-all-keywords): Fix arg passed to custom-add-to-group.
---

diff --git a/lisp/custom.el b/lisp/custom.el
index 0d0728d5462..dcc6bb6f046 100644
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -396,7 +396,7 @@ If no such group is found, return nil."
   "For customization option SYMBOL, handle keyword arguments ARGS.
 Third argument TYPE is the custom option type."
   (unless (memq :group args)
-    (custom-add-to-group (custom-current-group) symbol 'custom-face))
+    (custom-add-to-group (custom-current-group) symbol type))
   (while args
     (let ((arg (car args)))
       (setq args (cdr args))